; Music Of Pheelone (2009) (Condense) (Targhan)
; Ripped by Megachur the 15/07/2009

	write "PHEELONE.BIN"

music_date_rip	equ &0f79
music_adr	equ &4000
first_theme	equ 0
last_theme	equ 0

	read "music_header_v1_0.asm"

.l4000
	db #53,#4b,#31,#30,#00,#40,#01,#32
	db #00,#22,#40,#2f,#40,#a1,#40,#aa
	db #40,#1e,#40,#25,#40,#41,#40,#a7
	db #40,#05,#c0,#00,#00,#03,#c0,#00
	db #00,#1d,#7f,#01,#1e,#7f,#03,#5c
	db #20,#7f,#02,#3f,#04,#1e,#3e,#51
	db #44,#88,#44,#89,#44,#51,#44,#bf
	db #44,#89,#44,#40,#45,#54,#45,#76
	db #45,#9f,#45,#b5,#45,#0f,#46,#9f
	db #45,#26,#46,#0f,#46,#88,#46,#ca
	db #46,#2e,#47,#70,#47,#b2,#47,#5a
	db #48,#70,#47,#b2,#47,#5a,#48,#dd
	db #48,#fd,#48,#0e,#49,#29,#49,#35
	db #49,#e9,#49,#15,#4a,#24,#4a,#cc
	db #4a,#ff,#4a,#03,#4b,#a3,#4b,#c9
	db #4b,#d0,#4b,#f2,#4b,#d0,#4b,#14
	db #4c,#f2,#4b,#54,#4c,#76,#4c,#84
	db #4c,#54,#4c,#de,#4c,#fa,#4c,#52
	db #4d,#74,#4d,#8e,#4d,#e9,#4d,#fb
	db #4d,#09,#4e,#30,#4e,#4f,#4e,#7d
	db #4e,#fe,#9f,#4e,#fc,#9f,#4e,#1e
	db #9f,#4e,#ec,#40,#f6,#40,#12,#41
	db #2e,#41,#45,#41,#4e,#41,#66,#41
	db #77,#41,#9a,#41,#c1,#41,#d5,#41
	db #e0,#41,#f0,#41,#0e,#42,#2c,#42
	db #4a,#42,#53,#42,#75,#42,#97,#42
	db #b9,#42,#db,#42,#02,#43,#24,#43
	db #46,#43,#51,#43,#69,#43,#73,#43
	db #9d,#43,#b6,#43,#cf,#43,#e8,#43
	db #01,#44,#1a,#44,#f3,#40,#f6,#40
	db #ff,#37,#00,#00,#00,#00,#11,#41
	db #12,#41,#00,#37,#00,#4f,#05,#00
	db #4f,#04,#00,#4e,#03,#00,#4d,#02
	db #00,#4c,#01,#00,#0c,#0b,#0a,#0a
	db #09,#08,#2d,#41,#2e,#41,#00,#37
	db #00,#4b,#05,#00,#4b,#04,#00,#4b
	db #03,#00,#4a,#02,#00,#4a,#01,#00
	db #09,#09,#08,#08,#07,#07,#41,#41
	db #45,#41,#00,#37,#00,#2f,#18,#2e
	db #0c,#0e,#2d,#0c,#0c,#2c,#18,#2b
	db #0c,#0a,#2a,#0c,#0a,#4c,#41,#4e
	db #41,#00,#37,#00,#80,#10,#f3,#40
	db #66,#41,#00,#b7,#00,#1f,#05,#1f
	db #01,#3a,#21,#0c,#1f,#25,#1a,#04
	db #1a,#04,#3c,#24,#0c,#08,#f3,#40
	db #77,#41,#00,#b7,#00,#1f,#02,#1f
	db #21,#2d,#fc,#29,#f8,#15,#01,#7e
	db #41,#9a,#41,#00,#37,#00,#0f,#4f
	db #fe,#ff,#4f,#fc,#ff,#4f,#fa,#ff
	db #4f,#f8,#ff,#4f,#f6,#ff,#4f,#f8
	db #ff,#4f,#fa,#ff,#4f,#fc,#ff,#4f
	db #fe,#ff,#b7,#41,#c1,#41,#00,#37
	db #00,#2f,#0c,#0f,#2e,#18,#2e,#0c
	db #0d,#0d,#2c,#0c,#2c,#18,#0b,#2b
	db #0c,#0a,#2a,#0c,#2a,#18,#0a,#29
	db #0c,#29,#0c,#09,#29,#18,#29,#0c
	db #09,#c8,#41,#d5,#41,#00,#37,#00
	db #1d,#21,#0f,#0f,#82,#0c,#0c,#82
	db #0c,#0c,#82,#0c,#0c,#dc,#41,#e0
	db #41,#02,#37,#00,#0f,#82,#0c,#0c
	db #f3,#40,#f0,#41,#00,#b7,#00,#0f
	db #0e,#0d,#0c,#0b,#0a,#09,#08,#07
	db #f3,#40,#0e,#42,#01,#b7,#00,#0f
	db #2e,#03,#2d,#07,#0c,#2b,#03,#2a
	db #07,#09,#28,#03,#27,#07,#06,#25
	db #03,#24,#07,#03,#22,#03,#f3,#40
	db #2c,#42,#01,#b7,#00,#0f,#2e,#04
	db #2d,#07,#0c,#2b,#04,#2a,#07,#09
	db #28,#04,#27,#07,#06,#25,#04,#24
	db #07,#03,#22,#04,#f3,#40,#4a,#42
	db #01,#b7,#00,#0f,#2e,#05,#2d,#09
	db #0c,#2b,#05,#2a,#09,#09,#28,#05
	db #27,#09,#06,#25,#05,#24,#09,#03
	db #22,#05,#51,#42,#53,#42,#00,#37
	db #00,#2f,#f4,#f3,#40,#75,#42,#00
	db #b7,#00,#1f,#21,#2f,#05,#2e,#08
	db #0d,#2c,#05,#2b,#08,#0a,#29,#05
	db #28,#08,#07,#26,#05,#25,#08,#04
	db #23,#05,#22,#08,#01,#f3,#40,#97
	db #42,#00,#b7,#00,#1f,#21,#2f,#05
	db #2e,#07,#0d,#2c,#05,#2b,#07,#0a
	db #29,#05,#28,#07,#07,#26,#05,#25
	db #07,#04,#23,#05,#22,#07,#01,#f3
	db #40,#b9,#42,#00,#b7,#00,#1f,#21
	db #2f,#04,#2e,#09,#0d,#2c,#04,#2b
	db #09,#0a,#29,#04,#28,#09,#07,#26
	db #04,#25,#09,#04,#23,#04,#22,#09
	db #01,#f3,#40,#db,#42,#00,#b7,#00
	db #1f,#21,#2f,#04,#2e,#07,#0d,#2c
	db #04,#2b,#07,#0a,#29,#04,#28,#07
	db #07,#26,#04,#25,#07,#04,#23,#04
	db #22,#07,#01,#f9,#42,#02,#43,#00
	db #37,#00,#2e,#18,#2e,#0c,#0e,#2d
	db #0c,#2d,#f4,#2d,#18,#2c,#0c,#0c
	db #2b,#0c,#2b,#f4,#2b,#18,#2a,#0c
	db #0a,#2a,#0c,#2a,#f4,#2a,#18,#2a
	db #0c,#0a,#f3,#40,#24,#43,#00,#b7
	db #00,#1f,#21,#2f,#05,#2e,#09,#0d
	db #2c,#05,#2b,#09,#0a,#29,#05,#28
	db #09,#07,#26,#05,#25,#09,#04,#23
	db #05,#22,#09,#01,#f3,#40,#46,#43
	db #00,#b7,#00,#1f,#21,#2f,#04,#2e
	db #07,#0d,#2c,#04,#2b,#07,#0a,#29
	db #04,#28,#07,#07,#26,#04,#25,#07
	db #04,#23,#04,#22,#07,#01,#4d,#43
	db #51,#43,#00,#37,#00,#6f,#f4,#fe
	db #ff,#f3,#40,#69,#43,#00,#b7,#00
	db #1f,#01,#0f,#2f,#ff,#2f,#fd,#2f
	db #fa,#2e,#f7,#2d,#f5,#2c,#f1,#2b
	db #eb,#70,#43,#73,#43,#00,#37,#00
	db #82,#08,#f4,#96,#43,#9d,#43,#00
	db #37,#00,#80,#14,#80,#14,#2f,#0c
	db #0f,#80,#14,#80,#14,#2d,#0c,#0d
	db #80,#14,#80,#14,#2b,#0c,#0b,#80
	db #14,#80,#14,#29,#0c,#09,#80,#14
	db #80,#14,#28,#0c,#08,#f3,#40,#b6
	db #43,#01,#b7,#00,#0f,#2d,#03,#2b
	db #07,#09,#27,#03,#26,#07,#05,#24
	db #03,#23,#07,#02,#21,#03,#f3,#40
	db #cf,#43,#01,#b7,#00,#0f,#2d,#03
	db #2b,#08,#09,#27,#03,#26,#08,#05
	db #24,#03,#23,#08,#02,#21,#03,#f3
	db #40,#e8,#43,#01,#b7,#00,#0f,#2d
	db #07,#2b,#09,#09,#27,#07,#26,#09
	db #05,#24,#07,#23,#09,#02,#21,#07
	db #f3,#40,#01,#44,#01,#b7,#00,#0f
	db #2d,#04,#2b,#07,#09,#27,#04,#26
	db #07,#05,#24,#04,#23,#07,#02,#21
	db #04,#f3,#40,#1a,#44,#01,#b7,#00
	db #0f,#2e,#04,#2b,#06,#09,#27,#04
	db #26,#06,#05,#24,#04,#23,#06,#02
	db #21,#04,#f3,#40,#51,#44,#01,#b7
	db #00,#0f,#2f,#03,#2e,#07,#0e,#2d
	db #03,#2d,#07,#0c,#2c,#03,#2b,#07
	db #0b,#2a,#03,#2a,#07,#09,#29,#03
	db #28,#07,#08,#27,#03,#27,#07,#06
	db #26,#03,#25,#07,#05,#24,#03,#24
	db #07,#03,#23,#03,#22,#07,#02,#21
	db #03,#4e,#81,#01,#d0,#4f,#ce,#4f
	db #37,#d0,#37,#d0,#4f,#37,#d0,#4f
	db #d0,#4f,#ce,#4f,#37,#d0,#37,#ce
	db #37,#4f,#37,#d0,#4f,#d0,#4f,#ce
	db #4f,#37,#d0,#4f,#ce,#37,#4f,#37
	db #ce,#37,#4f,#d0,#4f,#ce,#4f,#37
	db #d0,#37,#ce,#37,#4f,#37,#ce,#37
	db #c2,#d0,#4e,#81,#02,#d0,#4f,#ce
	db #4f,#37,#d0,#37,#d0,#4f,#37,#d0
	db #4f,#d0,#4f,#ce,#4f,#37,#d0,#37
	db #ce,#37,#4f,#37,#d0,#4f,#d0,#4f
	db #ce,#4f,#37,#d0,#4f,#ce,#37,#4f
	db #37,#ce,#37,#4f,#d0,#4f,#ce,#4f
	db #37,#d0,#37,#ce,#37,#4f,#37,#7e
	db #93,#03,#7a,#19,#7e,#1b,#8c,#13
	db #7a,#19,#7e,#19,#88,#11,#7a,#17
	db #7e,#17,#84,#11,#82,#15,#7a,#15
	db #82,#0f,#7a,#17,#84,#0f,#88,#0f
	db #7e,#0f,#7a,#15,#7e,#15,#8c,#0f
	db #7a,#15,#7e,#15,#88,#0d,#7a,#13
	db #7e,#13,#84,#0b,#82,#0f,#7a,#11
	db #82,#0b,#7a,#11,#84,#0b,#88,#0b
	db #7e,#0b,#7a,#11,#7e,#13,#8c,#0b
	db #7a,#13,#7e,#11,#88,#0b,#7a,#0f
	db #7e,#11,#84,#0b,#82,#0d,#7a,#0f
	db #82,#0b,#7a,#11,#84,#0b,#88,#0b
	db #7e,#09,#7a,#0f,#7e,#11,#8c,#09
	db #7a,#0d,#7e,#0f,#88,#07,#7a,#0d
	db #7e,#0f,#84,#07,#82,#0d,#7a,#0f
	db #82,#07,#7a,#0f,#84,#07,#88,#07
	db #36,#85,#04,#da,#c6,#20,#c6,#20
	db #c6,#20,#c6,#20,#c6,#20,#c6,#20
	db #c6,#20,#c6,#20,#7e,#85,#03,#7a
	db #0d,#7e,#0f,#8c,#07,#7a,#0d,#7e
	db #0f,#88,#09,#7a,#0d,#ae,#8f,#05
	db #ae,#0d,#ae,#0b,#ae,#09,#ae,#07
	db #ae,#05,#ae,#03,#ae,#01,#4e,#85
	db #06,#1e,#81,#07,#ce,#4e,#83,#06
	db #1e,#81,#07,#ce,#4e,#81,#06,#1e
	db #80,#07,#1e,#40,#10,#c6,#10,#c6
	db #10,#c6,#10,#c8,#02,#10,#c8,#03
	db #10,#c8,#05,#10,#c8,#0f,#10,#4e
	db #81,#08,#d6,#67,#d6,#5d,#d8,#59
	db #d6,#61,#d8,#4f,#d6,#67,#d6,#5d
	db #d8,#59,#d6,#59,#c2,#4e,#81,#06
	db #36,#80,#09,#d8,#96,#80,#05,#36
	db #80,#09,#d0,#4e,#80,#06,#36,#80
	db #09,#d0,#54,#80,#06,#3c,#80,#09
	db #d8,#88,#80,#05,#40,#80,#09,#d0
	db #a0,#80,#05,#40,#80,#09,#d0,#4e
	db #80,#06,#36,#80,#09,#d8,#96,#80
	db #05,#36,#80,#09,#d0,#4e,#80,#06
	db #36,#80,#09,#d0,#4a,#80,#06,#32
	db #80,#09,#d8,#90,#80,#05,#48,#80
	db #06,#48,#80,#09,#ce,#90,#80,#05
	db #48,#80,#06,#48,#80,#09,#c2,#d2
	db #5c,#81,#08,#d6,#63,#d8,#55,#d6
	db #63,#d6,#55,#d8,#5d,#d6,#63,#d8
	db #55,#d6,#53,#d6,#4b,#c2,#4e,#81
	db #06,#36,#80,#09,#d8,#96,#80,#05
	db #36,#80,#09,#d0,#4e,#80,#06,#36
	db #80,#09,#ce,#54,#80,#06,#55,#3c
	db #80,#09,#d6,#58,#80,#06,#88,#80
	db #05,#58,#80,#06,#40,#80,#09,#a0
	db #80,#05,#40,#80,#09,#58,#80,#06
	db #a0,#80,#05,#40,#80,#09,#4e,#80
	db #06,#36,#80,#09,#d8,#96,#80,#05
	db #36,#80,#09,#d0,#4e,#80,#06,#36
	db #80,#09,#d0,#4a,#80,#06,#32,#80
	db #09,#d8,#a0,#80,#05,#a1,#58,#80
	db #06,#59,#58,#80,#05,#71,#89,#a1
	db #1e,#81,#0a,#37,#1f,#1f,#37,#1f
	db #1f,#37,#1f,#37,#1f,#1f,#37,#1f
	db #1f,#37,#1f,#37,#1f,#1f,#37,#1f
	db #1f,#37,#1f,#37,#1f,#1f,#23,#23
	db #3b,#23,#25,#3d,#25,#25,#3d,#25
	db #25,#3d,#25,#3d,#25,#25,#3d,#25
	db #25,#3d,#25,#3d,#25,#25,#3d,#25
	db #25,#3d,#25,#3d,#25,#25,#29,#29
	db #41,#29,#4e,#81,#06,#d0,#4f,#96
	db #80,#05,#ce,#4e,#80,#06,#4f,#ce
	db #4f,#4f,#ce,#96,#80,#05,#ce,#4e
	db #80,#06,#ce,#4f,#d0,#4f,#96,#80
	db #05,#ce,#4e,#80,#06,#4f,#ce,#4f
	db #4f,#ce,#9a,#80,#05,#52,#80,#06
	db #ce,#9a,#80,#05,#54,#80,#06,#d0
	db #55,#9c,#80,#05,#ce,#54,#80,#06
	db #55,#ce,#55,#55,#ce,#9c,#80,#05
	db #ce,#54,#80,#06,#ce,#55,#d0,#55
	db #9c,#80,#05,#ce,#54,#80,#06,#55
	db #ce,#55,#ce,#55,#a0,#80,#05,#a1
	db #58,#80,#06,#a0,#80,#05,#1e,#81
	db #0b,#37,#1f,#37,#1f,#1f,#37,#1f
	db #1f,#37,#1f,#37,#1f,#37,#1f,#37
	db #1f,#1f,#37,#1f,#1f,#37,#1f,#37
	db #1f,#37,#1f,#1f,#23,#3b,#23,#3b
	db #25,#25,#3d,#25,#25,#3d,#25,#3d
	db #25,#3d,#25,#25,#25,#3d,#25,#3d
	db #25,#25,#3d,#25,#3d,#25,#25,#3d
	db #25,#25,#3d,#25,#29,#41,#29,#41
	db #1e,#81,#0a,#37,#1f,#1f,#37,#1f
	db #1f,#37,#1f,#37,#1f,#1f,#37,#1f
	db #1f,#37,#1f,#37,#1f,#1f,#37,#1f
	db #1f,#37,#1f,#37,#1f,#1f,#23,#23
	db #3b,#23,#25,#3d,#25,#25,#3d,#25
	db #25,#3d,#25,#3d,#25,#25,#3d,#25
	db #25,#3d,#25,#3d,#25,#25,#3d,#25
	db #25,#3d,#25,#3d,#25,#25,#29,#29
	db #41,#29,#4e,#81,#06,#36,#80,#0b
	db #1f,#4e,#80,#06,#96,#80,#05,#1e
	db #80,#0b,#4e,#80,#06,#4f,#1e,#80
	db #0b,#4e,#80,#06,#4f,#36,#80,#0b
	db #96,#80,#05,#36,#80,#0b,#4e,#80
	db #06,#36,#80,#0b,#4e,#80,#06,#1e
	db #80,#0b,#37,#4e,#80,#06,#96,#80
	db #05,#36,#80,#0b,#4e,#80,#06,#4f
	db #1e,#80,#0b,#4e,#80,#06,#4f,#1e
	db #80,#0b,#9a,#80,#05,#52,#80,#06
	db #22,#80,#0b,#9a,#80,#05,#54,#80
	db #06,#24,#80,#0b,#3d,#54,#80,#06
	db #9c,#80,#05,#3c,#80,#0b,#54,#80
	db #06,#55,#24,#80,#0b,#54,#80,#06
	db #55,#24,#80,#0b,#9c,#80,#05,#3c
	db #80,#0b,#54,#80,#06,#3c,#80,#0b
	db #54,#80,#06,#24,#80,#0b,#3d,#54
	db #80,#06,#9c,#80,#05,#24,#80,#0b
	db #54,#80,#06,#55,#24,#80,#0b,#54
	db #80,#06,#3c,#80,#0b,#54,#80,#06
	db #a0,#80,#05,#a1,#58,#80,#06,#a0
	db #80,#05,#66,#81,#0c,#66,#05,#66
	db #07,#66,#01,#66,#05,#66,#07,#66
	db #01,#66,#05,#66,#07,#66,#01,#66
	db #05,#66,#07,#66,#01,#66,#05,#66
	db #07,#66,#09,#66,#01,#66,#05,#66
	db #07,#66,#01,#66,#05,#66,#07,#66
	db #01,#66,#05,#66,#07,#66,#01,#66
	db #05,#66,#07,#62,#81,#0d,#62,#07
	db #62,#01,#62,#07,#62,#81,#0e,#62
	db #05,#62,#07,#62,#01,#62,#05,#62
	db #07,#62,#01,#62,#05,#62,#07,#62
	db #01,#62,#05,#62,#07,#62,#01,#62
	db #05,#62,#07,#62,#09,#62,#01,#62
	db #05,#62,#07,#62,#01,#62,#05,#62
	db #07,#62,#01,#62,#05,#62,#07,#62
	db #01,#62,#05,#62,#07,#66,#01,#66
	db #05,#66,#01,#66,#07,#3c,#80,#0a
	db #ce,#ca,#3c,#80,#0a,#ca,#3c,#80
	db #0a,#ca,#3c,#80,#0a,#ce,#ca,#3c
	db #80,#0a,#ce,#ca,#40,#80,#0f,#c6
	db #10,#c6,#1c,#c6,#2c,#9c,#80,#05
	db #9d,#ce,#9d,#ce,#9d,#ce,#9d,#9d
	db #ce,#9d,#9d,#ce,#9d,#c2,#62,#81
	db #0e,#63,#c4,#0f,#62,#01,#c4,#0f
	db #62,#01,#c4,#0f,#62,#01,#63,#c4
	db #0f,#62,#01,#63,#c4,#0f,#66,#01
	db #c2,#36,#80,#0a,#c0,#1a,#2d,#d2
	db #2f,#c0,#1a,#33,#c2,#4e,#81,#06
	db #5c,#80,#10,#36,#80,#0b,#5c,#80
	db #10,#96,#80,#05,#5c,#80,#10,#4e
	db #80,#06,#4f,#5c,#80,#10,#4e,#80
	db #06,#4f,#5c,#80,#10,#96,#80,#05
	db #5c,#80,#10,#36,#80,#0b,#5c,#80
	db #10,#4e,#80,#06,#5c,#80,#11,#36
	db #80,#0b,#5c,#80,#11,#96,#80,#05
	db #5c,#80,#11,#36,#80,#0b,#4e,#80
	db #06,#36,#80,#0b,#5c,#80,#11,#4e
	db #80,#06,#5c,#80,#11,#96,#80,#05
	db #5c,#80,#11,#2c,#80,#0b,#4e,#80
	db #06,#4f,#5e,#80,#12,#2e,#80,#0b
	db #5e,#80,#12,#96,#80,#05,#5e,#80
	db #12,#2e,#80,#0b,#4e,#80,#06,#5e
	db #80,#12,#4e,#80,#06,#4f,#5e,#80
	db #12,#96,#80,#05,#5e,#80,#12,#4e
	db #80,#06,#5e,#80,#12,#4e,#80,#06
	db #5e,#80,#13,#2e,#80,#0b,#5e,#80
	db #13,#96,#80,#05,#5e,#80,#13,#2e
	db #80,#0b,#4e,#80,#06,#5e,#80,#13
	db #4e,#80,#06,#5e,#80,#13,#5f,#96
	db #80,#05,#4e,#80,#06,#96,#80,#05
	db #97,#7e,#81,#14,#d0,#71,#d0,#75
	db #e0,#c4,#01,#d2,#c4,#02,#d2,#c4
	db #03,#70,#01,#ce,#75,#ce,#7b,#ce
	db #6d,#d0,#71,#d0,#67,#d0,#63,#e6
	db #c4,#01,#c4,#02,#c4,#03,#6c,#01
	db #ce,#71,#ce,#7b,#c2,#3c,#80,#0a
	db #c0,#1e,#3b,#ea,#33,#da,#33,#d2
	db #35,#ce,#ca,#c2,#54,#80,#06,#5e
	db #80,#13,#3c,#80,#0b,#5e,#80,#13
	db #9c,#80,#05,#5e,#80,#13,#54,#80
	db #06,#55,#5e,#80,#13,#54,#80,#06
	db #5e,#80,#13,#54,#80,#06,#9c,#80
	db #05,#5e,#80,#13,#3c,#80,#0b,#5e
	db #80,#13,#54,#80,#06,#5e,#80,#13
	db #3c,#80,#0b,#54,#80,#06,#9c,#80
	db #05,#5e,#80,#13,#54,#80,#06,#55
	db #3c,#80,#0b,#54,#80,#06,#5e,#80
	db #13,#54,#80,#06,#9c,#80,#05,#3c
	db #80,#0b,#54,#80,#06,#5e,#80,#13
	db #58,#80,#06,#58,#80,#15,#40,#80
	db #0b,#58,#80,#06,#a0,#80,#05,#58
	db #80,#15,#58,#80,#06,#59,#58,#80
	db #15,#58,#80,#06,#40,#80,#0b,#58
	db #80,#06,#a0,#80,#05,#58,#80,#15
	db #58,#80,#06,#40,#80,#0b,#58,#80
	db #06,#62,#80,#16,#58,#80,#06,#59
	db #a0,#80,#05,#62,#80,#16,#40,#80
	db #0b,#62,#80,#16,#4a,#80,#06,#d2
	db #4d,#ce,#ca,#c2,#7e,#81,#14,#d0
	db #71,#d0,#75,#e8,#c4,#01,#c4,#02
	db #c4,#03,#c4,#04,#c4,#05,#70,#01
	db #ce,#75,#ce,#7b,#ce,#79,#d0,#7b
	db #d0,#79,#ce,#71,#67,#63,#61,#59
	db #4f,#4b,#49,#71,#d0,#79,#d0,#7b
	db #ce,#63,#d2,#65,#ce,#ca,#c2,#36
	db #81,#0a,#c2,#4e,#81,#06,#36,#80
	db #0b,#1f,#37,#7e,#80,#05,#36,#80
	db #0b,#4e,#80,#06,#4f,#36,#80,#0b
	db #37,#1f,#37,#7e,#80,#05,#1e,#80
	db #0b,#4e,#80,#06,#36,#80,#0b,#4e
	db #80,#06,#1e,#80,#0b,#37,#37,#7e
	db #80,#05,#1e,#80,#0b,#37,#4e,#80
	db #06,#36,#80,#0b,#1f,#4e,#80,#06
	db #36,#80,#0b,#7e,#80,#05,#36,#80
	db #0b,#4e,#80,#06,#36,#80,#0b,#4e
	db #80,#06,#36,#80,#0b,#1f,#37,#7e
	db #80,#05,#1e,#80,#0b,#4e,#80,#06
	db #4f,#36,#80,#0b,#4e,#80,#06,#36
	db #80,#0b,#4e,#80,#06,#7e,#80,#05
	db #36,#80,#0b,#4e,#80,#06,#36,#80
	db #0b,#4e,#80,#06,#1e,#80,#0b,#37
	db #4e,#80,#06,#7e,#80,#05,#36,#80
	db #0b,#4e,#80,#06,#36,#80,#0b,#37
	db #4e,#80,#06,#36,#80,#0b,#4e,#80
	db #06,#7e,#80,#05,#4e,#80,#06,#7e
	db #80,#05,#7f,#36,#83,#0f,#c0,#1e
	db #36,#03,#3b,#3d,#45,#4b,#4f,#45
	db #4b,#37,#3b,#3d,#41,#4f,#4b,#63
	db #67,#37,#3b,#3d,#45,#4b,#4f,#45
	db #4b,#37,#3b,#3d,#41,#4b,#49,#4b
	db #49,#4e,#81,#06,#1e,#80,#0f,#c2
	db #36,#83,#0f,#3b,#3d,#45,#4b,#4f
	db #45,#4b,#37,#3b,#3d,#41,#4f,#4b
	db #63,#67,#37,#3b,#3d,#45,#4b,#4f
	db #45,#4b,#37,#3b,#3d,#41,#4b,#49
	db #4b,#49,#36,#83,#17,#3b,#3d,#45
	db #4b,#4f,#45,#4b,#37,#3b,#3d,#41
	db #4f,#4b,#63,#67,#37,#3b,#3d,#45
	db #4b,#4f,#45,#4b,#37,#3b,#3d,#41
	db #4b,#49,#4b,#49,#4c,#81,#18,#3a
	db #80,#19,#3d,#45,#4c,#80,#18,#4e
	db #80,#19,#45,#4b,#4c,#80,#18,#3a
	db #80,#19,#3d,#41,#4c,#80,#18,#4a
	db #80,#19,#4b,#4f,#4c,#80,#18,#3a
	db #80,#19,#3d,#45,#4c,#80,#18,#4e
	db #80,#19,#45,#4b,#4c,#80,#18,#3a
	db #80,#19,#3d,#41,#4c,#80,#18,#48
	db #80,#19,#4b,#49,#36,#81,#0f,#3b
	db #3d,#45,#4b,#4f,#45,#4b,#37,#3b
	db #3d,#41,#4f,#4b,#63,#67,#37,#3b
	db #3d,#45,#4b,#4f,#45,#4b,#37,#3b
	db #3d,#41,#4b,#49,#4b,#49,#96,#83
	db #1a,#d0,#89,#d0,#8d,#de,#7f,#d0
	db #71,#d0,#75,#c2,#4e,#81,#06,#4e
	db #83,#1b,#4e,#81,#06,#4e,#81,#1b
	db #7e,#81,#05,#7e,#85,#1b,#66,#03
	db #4e,#81,#06,#66,#85,#1b,#4e,#81
	db #06,#4e,#01,#4e,#85,#1b,#7e,#81
	db #05,#7e,#81,#1b,#4e,#05,#66,#03
	db #4e,#81,#06,#66,#85,#1b,#4e,#81
	db #06,#66,#85,#1b,#7e,#81,#05,#66
	db #87,#1b,#4e,#05,#4e,#81,#06,#7e
	db #85,#1b,#4e,#03,#4e,#81,#06,#4e
	db #83,#1b,#7e,#81,#05,#4e,#83,#1b
	db #4e,#81,#06,#66,#83,#1b,#7e,#80
	db #1a,#d0,#83,#d0,#85,#ce,#89,#d0
	db #8d,#d0,#93,#ce,#7f,#d0,#83,#d0
	db #85,#ce,#89,#ce,#7f,#ce,#93,#ce
	db #97,#c2,#4e,#81,#06,#4e,#83,#1c
	db #4e,#81,#06,#4e,#83,#1c,#7e,#81
	db #05,#66,#81,#1c,#4e,#05,#4e,#81
	db #06,#7e,#85,#1c,#4e,#81,#06,#4f
	db #4e,#83,#1c,#67,#7e,#81,#05,#7e
	db #85,#1c,#66,#03,#4e,#81,#06,#66
	db #83,#1c,#4e,#81,#06,#66,#83,#1c
	db #7e,#81,#05,#66,#81,#1c,#4e,#05
	db #4e,#81,#06,#4e,#85,#1c,#66,#03
	db #4e,#81,#06,#4e,#83,#1c,#7e,#81
	db #05,#4e,#81,#1c,#4e,#81,#06,#7e
	db #85,#1c,#40,#81,#0f,#45,#49,#4f
	db #5d,#61,#59,#5d,#41,#45,#49,#4f
	db #59,#4f,#5d,#61,#41,#45,#49,#4f
	db #5d,#61,#59,#5d,#41,#45,#49,#4f
	db #59,#4f,#65,#67,#96,#80,#1a,#93
	db #91,#93,#91,#7f,#7b,#79,#d6,#79
	db #7b,#7f,#71,#75,#79,#71,#89,#7f
	db #8d,#91,#d6,#7f,#89,#8d,#4e,#81
	db #06,#66,#83,#1d,#4e,#81,#06,#4e
	db #83,#1d,#96,#81,#05,#4e,#85,#1d
	db #66,#03,#4e,#81,#06,#4e,#81,#1d
	db #66,#03,#4e,#81,#06,#4e,#85,#1d
	db #96,#81,#05,#7e,#85,#1d,#4e,#81
	db #06,#66,#85,#1d,#4e,#81,#06,#7e
	db #85,#1d,#4e,#81,#06,#66,#85,#1d
	db #96,#81,#05,#66,#81,#1d,#4e,#05
	db #4e,#81,#06,#4e,#85,#1d,#4e,#81
	db #06,#4f,#66,#81,#1d,#96,#81,#05
	db #4e,#85,#1d,#4e,#81,#06,#96,#80
	db #05,#40,#83,#0f,#45,#47,#4f,#5d
	db #5f,#55,#59,#41,#45,#47,#4f,#5f
	db #55,#63,#67,#8e,#80,#1a,#d0,#89
	db #d0,#8d,#d0,#85,#d0,#89,#ce,#7f
	db #c2,#4e,#81,#06,#4e,#83,#1c,#4e
	db #81,#06,#4e,#83,#1c,#7e,#81,#05
	db #66,#81,#1c,#4e,#05,#4e,#81,#06
	db #7e,#85,#1c,#4e,#81,#06,#4f,#4e
	db #83,#1c,#7e,#81,#05,#7f,#7f,#7f
	db #46,#80,#0f,#d0,#45,#d0,#41,#d0
	db #3d,#d0,#39,#d2,#4e,#80,#06,#4e
	db #80,#19,#dc,#c6,#e0,#c6,#e0,#c6
	db #e0,#c6,#e0,#c6,#e0,#c6,#e0,#4e
	db #81,#06,#76,#85,#1e,#ce,#4e,#80
	db #06,#76,#85,#1e,#ce,#4e,#80,#06
	db #76,#85,#1f,#96,#81,#05,#4e,#80
	db #06,#76,#85,#1f,#4e,#81,#06,#4f
	db #76,#85,#1f,#4e,#81,#06,#76,#85
	db #1f,#66,#80,#20,#c2,#7e,#83,#1a
	db #d0,#83,#d0,#85,#d0,#89,#d0,#8d
	db #ce,#93,#ce,#96,#81,#14,#da,#c4
	db #02,#c4,#03,#c4,#04,#c4,#05,#c4
	db #06,#c4,#07,#c4,#08,#c4,#09,#ff
	jp l5712	; init music
	jp l4ead	; play_music
	jp l56f6	; stop music
.l4eac equ $ + 3
.l4eab equ $ + 2
	db #a0,#4e,#00,#00
;
.play_music
.l4ead
;
	xor a
	ld (l4eab),a
	ld (l56dd),a
.l4eb5 equ $ + 1
	ld a,#00
.l4eb7 equ $ + 1
	cp #00
	jr z,l4ec1
	inc a
	ld (l4eb5),a
	jp l5150
.l4ec1
	xor a
	ld (l4eb5),a
.l4ec5
	or a
	jp nc,l4fa7
	ld (l4fcf),a
	ld (l503a),a
	ld (l50a5),a
	ld a,#b7
	ld (l4ec5),a
.l4ed8 equ $ + 1
	ld a,#00
	sub #01
	jr nc,l4f0e
.l4ede equ $ + 1
	ld hl,#0000
	ld a,(hl)
	inc hl
	srl a
	jr c,l4f0b
	ld b,a
	and #1f
	bit 4,a
	jr z,l4eef
	or #e0
.l4eef
	ld (l4fdc),a
	rl b
	rl b
	jr nc,l4efd
	ld a,(hl)
	ld (l5047),a
	inc hl
.l4efd
	rl b
	jr nc,l4f06
	ld a,(hl)
	ld (l50b2),a
	inc hl
.l4f06
	ld (l4ede),hl
	jr l4f11
.l4f0b
	ld (l4ede),hl
.l4f0e
	ld (l4ed8),a
.l4f12 equ $ + 1
.l4f11
	ld a,#00
	sub #01
	jr c,l4f1e
	ld (l4f12),a
.l4f1b equ $ + 1
	ld a,#00
	jr l4f39
.l4f1f equ $ + 1
.l4f1e
	ld hl,#0000
	ld a,(hl)
	inc hl
	srl a
	jr c,l4f2c
	ld (l4f1f),hl
	jr l4f39
.l4f2c
	ld (l4f1b),a
	ld b,a
	ld a,(hl)
	inc hl
	ld (l4f1f),hl
	ld (l4f12),a
	ld a,b
.l4f39
	ld (l5110),a
.l4f3d equ $ + 1
	ld hl,#0000
	ld de,l4fd5
	ldi
	ldi
	ld de,l5040
	ldi
	ldi
	ld de,l50ab
	ldi
	ldi
	ld (l4f3d),hl
.l4f58 equ $ + 1
	ld a,#00
	or a
	jr nz,l4f6a
.l4f5d equ $ + 1
	ld a,#00
	sub #01
	jr c,l4f78
	ld (l4f5d),a
.l4f66 equ $ + 1
	ld hl,#0000
	jr l4fb0
.l4f6b equ $ + 1
.l4f6a
	ld a,#00
	sub #01
	jr c,l4f78
	ld (l4f6b),a
	ld hl,(l4f79)
	jr l4f9d
.l4f79 equ $ + 1
.l4f78
	ld hl,#0000
	ld a,(hl)
	inc hl
	srl a
	jr c,l4f95
	ld (l4f5d),a
	xor a
	ld (l4f58),a
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	ld (l4f79),hl
	ex de,hl
	ld (l4f66),hl
	jr l4fb0
.l4f95
	ld (l4f6b),a
	ld a,#01
	ld (l4f58),a
.l4f9d
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	ld (l4f79),hl
	ex de,hl
	jr l4fb0
.l4fa8 equ $ + 1
.l4fa7
	ld a,#00
	sub #01
	jr nc,l4fcb
.l4fae equ $ + 1
	ld hl,#0000
.l4fb0
	ld a,(hl)
	inc hl
	srl a
	jr c,l4fc8
	srl a
	jr c,l4fbf
	ld (l4eb7),a
	jr l4fc7
.l4fbf
	ld (l4eab),a
.l4fc3 equ $ + 1
	ld a,#01
	ld (l4eac),a
.l4fc7
	xor a
.l4fc8
	ld (l4fae),hl
.l4fcb
	ld (l4fa8),a
.l4fcf equ $ + 1
	ld a,#00
	sub #01
	jr nc,l5036
.l4fd5 equ $ + 1
	ld hl,#0000
.l4fd8 equ $ + 1
	ld bc,#0100
.l4fdc equ $ + 2
.l4fdb equ $ + 1
	ld de,#0000
.l4fdf equ $ + 2
	ld lx,#00
	call l524f
	ld a,lx
	ld (l4fdf),a
	ld (l515a),hl
	exx
	ld (l4fd5),hl
	ld a,c
	ld (l4fd8),a
	ld (l5154),a
	xor a
	or hy
	jr nz,l5034
	ld (l5177),a
	ld d,a
	ld a,e
	ld (l4fdb),a
	ld l,d
	ld h,l
	ld (l5157),hl
.l5009 equ $ + 1
	ld hl,#0000
	ex de,hl
	add hl,hl
	add hl,de
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	ld de,l5188
	ldi
	ldi
	ld de,l5180
	ldi
	ldi
	ld de,l5179
	ldi
	ld de,l518a
	ldi
	ld a,(hl)
	inc hl
	ld (l5169),hl
	ld hl,l56dd
	or (hl)
	ld (hl),a
.l5034
	ld a,ly
.l5036
	ld (l4fcf),a
.l503a equ $ + 1
	ld a,#00
	sub #01
	jr nc,l50a1
.l5040 equ $ + 1
	ld hl,#0000
.l5043 equ $ + 1
	ld bc,#0200
.l5047 equ $ + 2
.l5046 equ $ + 1
	ld de,#0000
.l504a equ $ + 2
	ld lx,#00
	call l524f
	ld a,lx
	ld (l504a),a
	ld (l51ac),hl
	exx
	ld (l5040),hl
	ld a,c
	ld (l5043),a
	ld (l51a6),a
	xor a
	or hy
	jr nz,l509f
	ld (l51c9),a
	ld d,a
	ld a,e
	ld (l5046),a
	ld l,d
	ld h,l
	ld (l51a9),hl
.l5074 equ $ + 1
	ld hl,#0000
	ex de,hl
	add hl,hl
	add hl,de
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	ld de,l51da
	ldi
	ldi
	ld de,l51d2
	ldi
	ldi
	ld de,l51cb
	ldi
	ld de,l51dc
	ldi
	ld a,(hl)
	inc hl
	ld (l51bb),hl
	ld hl,l56dd
	or (hl)
	ld (hl),a
.l509f
	ld a,ly
.l50a1
	ld (l503a),a
.l50a5 equ $ + 1
	ld a,#00
	sub #01
	jr nc,l510c
.l50ab equ $ + 1
	ld hl,#0000
.l50ae equ $ + 1
	ld bc,#0300
.l50b2 equ $ + 2
.l50b1 equ $ + 1
	ld de,#0000
.l50b5 equ $ + 2
	ld lx,#00
	call l524f
	ld a,lx
	ld (l50b5),a
	ld (l51fe),hl
	exx
	ld (l50ab),hl
	ld a,c
	ld (l50ae),a
	ld (l51f8),a
	xor a
	or hy
	jr nz,l510a
	ld (l521b),a
	ld d,a
	ld a,e
	ld (l50b1),a
	ld l,d
	ld h,l
	ld (l51fb),hl
.l50df equ $ + 1
	ld hl,#0000
	ex de,hl
	add hl,hl
	add hl,de
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	ld de,l522c
	ldi
	ldi
	ld de,l5224
	ldi
	ldi
	ld de,l521d
	ldi
	ld de,l522e
	ldi
	ld a,(hl)
	inc hl
	ld (l520d),hl
	ld hl,l56dd
	or (hl)
	ld (hl),a
.l510a
	ld a,ly
.l510c
	ld (l50a5),a
.l5110 equ $ + 1
	ld a,#00
	sub #01
	jr c,l511a
	ld (l5110),a
	jr l5150
.l511a
	ld a,#37
	ld (l4ec5),a
	ld hl,(l4f3d)
.l5123 equ $ + 1
	ld de,#0000
	xor a
	sbc hl,de
	jr nz,l5150
	ld (l4ed8),a
	ld (l4f12),a
	ld (l4fa8),a
.l5134 equ $ + 1
	ld hl,#0000
	ld (l4ede),hl
.l513a equ $ + 1
	ld hl,#0000
	ld (l4f1f),hl
.l5140 equ $ + 1
	ld hl,#0000
	ld (l4f3d),hl
.l5146 equ $ + 1
	ld hl,#0000
	ld (l4f79),hl
.l514c equ $ + 1
	ld a,#00
	ld (l4f58),a
.l5150
	ld hl,l56dd
.l5154 equ $ + 1
	ld d,#00
	exx
.l5157 equ $ + 1
	ld hl,#0000
.l515a equ $ + 1
	ld de,#0000
	add hl,de
	ld (l5157),hl
	ld (l538a),hl
	ld a,(l4fdf)
	ld lx,a
.l5169 equ $ + 1
	ld hl,#0000
	ld iy,l5578
	ld a,(l5177)
	call l52e4
	ex de,hl
.l5177 equ $ + 1
	ld a,#00
.l5179 equ $ + 1
	cp #00
	jr z,l517f
	inc a
	jr l519c
.l5180 equ $ + 1
.l517f
	ld hl,#0000
	xor a
	sbc hl,de
	jr nz,l5198
.l5188 equ $ + 1
	ld de,#0000
.l518a
	or a
	jr c,l5198
.l518e equ $ + 1
	ld hl,#0000
	ld (l5180),hl
	dec a
	ld (l5179),a
	inc a
.l5198
	ld (l5169),de
.l519c
	ld (l5177),a
	ld a,hx
	ld (l524b),a
	exx
.l51a6 equ $ + 1
	ld d,#00
	exx
.l51a9 equ $ + 1
	ld hl,#0000
.l51ac equ $ + 1
	ld de,#0000
	add hl,de
	ld (l51a9),hl
	ld (l538a),hl
	ld a,(l504a)
	ld lx,a
.l51bb equ $ + 1
	ld hl,#0000
	ld iy,l55c9
	ld a,(l51c9)
	call l52e4
	ex de,hl
.l51c9 equ $ + 1
	ld a,#00
.l51cb equ $ + 1
	cp #00
	jr z,l51d1
	inc a
	jr l51ee
.l51d2 equ $ + 1
.l51d1
	ld hl,#0000
	xor a
	sbc hl,de
	jr nz,l51ea
.l51da equ $ + 1
	ld de,#0000
.l51dc
	or a
	jr c,l51ea
.l51e0 equ $ + 1
	ld hl,#0000
	ld (l51d2),hl
	dec a
	ld (l51cb),a
	inc a
.l51ea
	ld (l51bb),de
.l51ee
	ld (l51c9),a
	ld a,hx
	ld (l5248),a
	exx
.l51f8 equ $ + 1
	ld d,#00
	exx
.l51fb equ $ + 1
	ld hl,#0000
.l51fe equ $ + 1
	ld de,#0000
	add hl,de
	ld (l51fb),hl
	ld (l538a),hl
	ld a,(l50b5)
	ld lx,a
.l520d equ $ + 1
	ld hl,#0000
	ld iy,l561a
	ld a,(l521b)
	call l52e4
	ex de,hl
.l521b equ $ + 1
	ld a,#00
.l521d equ $ + 1
	cp #00
	jr z,l5223
	inc a
	jr l5240
.l5224 equ $ + 1
.l5223
	ld hl,#0000
	xor a
	sbc hl,de
	jr nz,l523c
.l522c equ $ + 1
	ld de,#0000
.l522e
	or a
	jr c,l523c
.l5232 equ $ + 1
	ld hl,#0000
	ld (l5224),hl
	dec a
	ld (l521d),a
	inc a
.l523c
	ld (l520d),de
.l5240
	ld (l521b),a
	ld a,hx
	sla a
.l5248 equ $ + 1
	or #00
	rla
.l524b equ $ + 1
	or #00
	jp l556d
.l524f
	ld a,(hl)
	inc hl
	srl a
	jr c,l5288
	cp #60
	jr nc,l5290
	ld hy,#00
	add d
	ld lx,a
	ld b,(hl)
	inc hl
	ld a,b
	rra
	jr nc,l5268
	and #0f
	ld c,a
.l5268
	rl b
	jr nc,l526e
	ld e,(hl)
	inc hl
.l526e
	rl b
	jr nc,l5280
.l5272
	ld a,(hl)
	inc hl
	exx
	ld l,a
	ld h,#00
	rla
	jr nc,l527c
	dec h
.l527c
	ld ly,#00
	ret
.l5280
	exx
	ld hl,#0000
	ld ly,#00
	ret
.l5288
	ld hy,#00
	add d
	ld lx,a
	jr l5280
.l5290
	ld hy,#01
	sub #60
	jr z,l52b1
	dec a
	jr z,l52c8
	dec a
	jr z,l52ba
	dec a
	jr z,l5272
	dec a
	jr z,l52c4
	dec a
	jr z,l52d9
	dec a
	jr z,l52d0
	dec a
	exx
	ld ly,a
	ld hl,#0000
	ret
.l52b1
	ld a,(hl)
	inc hl
	exx
	ld ly,a
	ld hl,#0000
	ret
.l52ba
	ld c,(hl)
	inc hl
	exx
	ld ly,#00
	ld hl,#0000
	ret
.l52c4
	ld c,(hl)
	inc hl
	jr l5272
.l52c8
	ld ly,#ff
	exx
	ld hl,#0000
	ret
.l52d0
	ld a,(hl)
	inc hl
	ld (l4eab),a
	ld a,b
	ld (l4eac),a
.l52d9
	ld iy,#0000
	ld e,#00
	exx
	ld hl,#0000
	ret
.l52e4
	ld e,(hl)
	inc hl
	bit 7,e
	jp nz,l539a
	bit 4,e
	jr z,l534c
	ld a,(hl)
	bit 6,a
	jr z,l5319
	ld d,#08
	inc hl
	and #1f
	jr z,l5300
	ld (l566b),a
	res 3,d
.l5300
	ld a,e
	and #0f
	exx
	sub d
	exx
	jr nc,l5309
	xor a
.l5309
	ld (iy+#36),a
	ld hx,d
	ld a,(hl)
	ld (iy+#00),a
	inc hl
	ld a,(hl)
	ld (iy+#1b),a
	inc hl
	ret
.l5319
	ld (l566b),a
	inc hl
	ld d,#01
	bit 5,a
	jr z,l5335
	res 0,d
	ld a,e
	and #0f
	exx
	sub d
	exx
	jr nc,l532e
	xor a
.l532e
	ld (iy+#36),a
	ld hx,d
	jr l535f
.l5335
	ld a,e
	and #0f
	exx
	sub d
	exx
	jr nc,l533e
	xor a
.l533e
	ld (iy+#36),a
.l5341
	ld hx,d
	ret
.l5344
	ld (iy+#36),#00
	ld d,#09
	jr l5341
.l534c
	ld d,#08
	ld a,e
	and #0f
	jr z,l5344
	exx
	sub d
	exx
	jr nc,l5359
	xor a
.l5359
	ld (iy+#36),a
	ld hx,#08
.l535f
	bit 5,e
	jr z,l5367
	ld a,(hl)
	inc hl
	jr l5368
.l5367
	xor a
.l5368
	bit 6,e
	jr z,l5372
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	jr l5375
.l5372
	ld de,#0000
.l5375
	add lx
	cp #60
	jr c,l537d
	ld a,#60
.l537d
	push hl
	add a
	ld l,a
	ld h,#00
	ld bc,l54ad
	add hl,bc
	ld c,(hl)
	inc hl
	ld b,(hl)
.l538a equ $ + 1
	ld hl,#0000
	sra h
	rr l
	add hl,bc
	add hl,de
	ld (iy+#00),l
	ld (iy+#1b),h
	pop hl
	ret
.l539a
	or a
	jr nz,l53a4
	ld a,e
	exx
	and #40
	or (hl)
	ld (hl),a
	exx
.l53a4
	ld a,e
	or #08
	and #09
	ld d,a
	ld (iy+#36),#10
	ld b,(hl)
	inc hl
	ld a,b
	and #03
	add a
	add #08
	ld (l56d6),a
	bit 3,e
	jr z,l53c6
	ld a,(hl)
	inc hl
	ld (l566b),a
	res 3,d
	jr l53c6
.l53c6
	ld hx,d
	xor a
	bit 7,b
	jr z,l53d8
	bit 6,b
	jr z,l53d3
	ld a,(hl)
	inc hl
.l53d3
	ld (l5487),a
	ld a,#01
.l53d8
	ld (l5420),a
	ld a,b
	rra
	and #0e
	ld (l5431),a
	bit 4,e
	jp nz,l5492
	bit 1,e
	jr z,l53ef
	ld a,(hl)
	inc hl
	jr l53f0
.l53ef
	xor a
.l53f0
	ex af,af'
	ld a,e
	ex af,af'
	bit 2,e
	jr z,l53fd
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	jr l5400
.l53fd
	ld de,#0000
.l5400
	add lx
	cp #60
	jr c,l5408
	ld a,#60
.l5408
	push hl
	add a
	ld l,a
	ld h,#00
	ld bc,l54ad
	add hl,bc
	ld c,(hl)
	inc hl
	ld b,(hl)
	ld hl,(l538a)
	sra h
	rr l
	add hl,bc
	add hl,de
	ld c,l
	ld b,h
.l5420 equ $ + 1
	ld a,#00
	or a
	jr nz,l5430
	ex af,af'
	bit 5,a
	jr nz,l549b
.l5429
	ld a,c
	ld (iy+#00),c
	ld (iy+#1b),b
.l5431 equ $ + 1
.l5430
	ld e,#00
	ld a,e
	srl a
	add e
	ld (l543b),a
	ld a,c
.l543b equ $ + 1
	jr l543c
.l543c
	srl b
	rra
	srl b
	rra
	srl b
	rra
	srl b
	rra
	srl b
	rra
	srl b
	rra
	srl b
	rra
	ld c,a
	jr nc,l5455
	inc bc
.l5455
	ld a,c
	ld (l56a0),a
	ld a,b
	ld (l56bb),a
	ld a,(l5420)
	or a
	jr z,l5490
	ld a,(l5431)
	ld e,a
	srl a
	add e
	ld (l546f),a
	ld a,b
.l546f equ $ + 1
	jr l5470
.l5470
	sla c
	rla
	sla c
	rla
	sla c
	rla
	sla c
	rla
	sla c
	rla
	sla c
	rla
	sla c
	rla
	ld b,a
.l5487 equ $ + 1
	ld hl,#0000
	add hl,bc
	ld (iy+#00),l
	ld (iy+#1b),h
.l5490
	pop hl
	ret
.l5492
	ld c,(hl)
	inc hl
	ld b,(hl)
	inc hl
	push hl
	bit 5,e
	jr z,l5429
.l549b
	pop hl
	ld (iy+#00),c
	ld (iy+#1b),b
	ld a,(hl)
	ld (l56a0),a
	inc hl
	ld a,(hl)
	ld (l56bb),a
	inc hl
	ret
.l54ad
	dw #0eee,#0e18,#0d4d,#0c8e
	dw #0bda,#0b2f,#0a8f,#09f7
	dw #0968,#08e1,#0861,#07e9
	dw #0777,#070c,#06a7,#0647
	dw #05ed,#0598,#0547,#04fc
	dw #04b4,#0470,#0431,#03f4
	dw #03bc,#0386,#0353,#0324
	dw #02f6,#02cc,#02a4,#027e
	dw #025a,#0238,#0218,#01fa
	dw #01de,#01c3,#01aa,#0192
	dw #017b,#0166,#0152,#013f
	dw #012d,#011c,#010c,#00fd
	dw #00ef,#00e1,#00d5,#00c9
	dw #00be,#00b3,#00a9,#009f
	dw #0096,#008e,#0086,#007f
	dw #0077,#0071,#006a,#0064
	dw #005f,#0059,#0054,#0050
	dw #004b,#0047,#0043,#003f
	dw #003c,#0038,#0035,#0032
	dw #002f,#002d,#002a,#0028
	dw #0026,#0024,#0022,#0020
	dw #001e,#001c,#001b,#0019
	dw #0018,#0016,#0015,#0014
	dw #0013,#0012,#0011,#0010
.l556d
	ld h,a
	ld b,#f4
	exx
	ld bc,#f6c0
	ld e,#80
	exx
.l5578 equ $ + 1
	ld a,#00
.l557a equ $ + 1
	cp #00
	jr z,l5592
	ld d,#00
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l557a),a
	exx
.l5592
	ld a,#00
.l5595 equ $ + 1
	cp #00
	jr z,l55ad
	ld d,#01
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l5595),a
	exx
.l55ae equ $ + 1
.l55ad
	ld a,#00
.l55b0 equ $ + 1
	cp #00
	jr z,l55c8
	ld d,#08
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l55b0),a
	exx
.l55c9 equ $ + 1
.l55c8
	ld a,#00
.l55cb equ $ + 1
	cp #00
	jr z,l55e3
	ld d,#02
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l55cb),a
	exx
.l55e3
	ld a,#00
.l55e6 equ $ + 1
	cp #00
	jr z,l55fe
	ld d,#03
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l55e6),a
	exx
.l55ff equ $ + 1
.l55fe
	ld a,#00
.l5601 equ $ + 1
	cp #00
	jr z,l5619
	ld d,#09
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l5601),a
	exx
.l561a equ $ + 1
.l5619
	ld a,#00
.l561c equ $ + 1
	cp #00
	jr z,l5634
	ld d,#04
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l561c),a
	exx
.l5634
	ld a,#00
.l5637 equ $ + 1
	cp #00
	jr z,l564f
	ld d,#05
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l5637),a
	exx
.l5650 equ $ + 1
.l564f
	ld a,#00
.l5652 equ $ + 1
	cp #00
	jr z,l566a
	ld d,#0a
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l5652),a
	exx
.l566b equ $ + 1
.l566a
	ld a,#00
.l566d equ $ + 1
	cp #00
	jr z,l5685
	ld d,#06
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l566d),a
	exx
.l5685
	ld a,h
.l5687 equ $ + 1
	cp #c0
	jr z,l569f
	ld d,#07
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l5687),a
	exx
.l56a0 equ $ + 1
.l569f
	ld a,#00
.l56a2 equ $ + 1
	cp #00
	jr z,l56ba
	ld d,#0b
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l56a2),a
	exx
.l56bb equ $ + 1
.l56ba
	ld a,#00
.l56bd equ $ + 1
	cp #00
	jr z,l56d5
	ld d,#0c
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l56bd),a
	exx
.l56d6 equ $ + 1
.l56d5
	ld a,#00
.l56d8 equ $ + 1
	cp #ff
	jr nz,l56e1
	ld h,a
.l56dd equ $ + 1
	ld a,#00
	or a
	ret z
	ld a,h
.l56e1
	ld d,#0d
	out (c),d
	exx
	out (c),c
	db &ed,&71 ; out (c),0
	exx
	out (c),a
	exx
	out (c),e
	db &ed,&71 ; out (c),0
	ld (l56d8),a
	ret
;
.stop_music
.l56f6
;
	xor a
	ld (l55ae),a
	ld (l55ff),a
	ld (l5650),a
	dec a
	ld (l55b0),a
	ld (l5601),a
	ld (l5652),a
	ld (l5687),a
	ld a,#3f
	jp l556d
;
.real_init_music
.l5712
;
	ld hl,#0006
	add hl,de
	ld a,(hl)
	ld (l4fc3),a
	ld de,#0003
	add hl,de
	ld de,l4f1f
	ldi
	ldi
	ld de,l4f3d
	ldi
	ldi
	ld de,l4f79
	ldi
	ldi
	ld de,l5009
	ldi
	ldi
	ld de,l5134
	ldi
	ldi
	ld de,l513a
	ldi
	ldi
	ld de,l5140
	ldi
	ldi
	ld de,l5146
	ldi
	ldi
	ld a,(hl)
	inc hl
	ld (l4eb7),a
	ld (l4eb5),a
	ld (l4ede),hl
	ld hl,(l4f79)
	ld (l5123),hl
	ld a,(hl)
	and #01
	ld (l4f58),a
	ld hl,(l5146)
	ld a,(hl)
	and #01
	ld (l514c),a
	ld hl,(l5009)
	ld (l5074),hl
	ld (l50df),hl
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	ex de,hl
	ld bc,#0007
	add hl,bc
	ld (l5169),hl
	ld (l51bb),hl
	ld (l520d),hl
	ld (l5188),hl
	ld (l51da),hl
	ld (l522c),hl
	ex de,hl
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld (l518e),de
	ld (l51e0),de
	ld (l5232),de
	ld (l5180),de
	ld (l51d2),de
	ld (l5224),de
	ld a,#37
	ld (l4ec5),a
	ld hl,l57ce
.l57be
	ld a,(hl)
	or a
	ret z
	ld b,a
	inc hl
	ld a,(hl)
	inc hl
.l57c5
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	ld (de),a
;	djnz l57c5	modified by Megachur !!!
	defs 2,0
	jr l57be
.l57ce
	jr l57d0
.l57d0
	ld a,b
	ld d,l
	sub e
	ld d,l
	ret
	
;
.init_music
;
	ld de,l4000
	jp real_init_music
;
.game_name
	db "Pheelone",0
.game_year
	db "2009",0
.game_publisher
	db "Condense",0
.music_author
	db "Targhan",0
.music_comment
	db "SK10",0

	read "music_end_v1_0.asm"
